ADD PRO PARK AND UNPARK TO PROTOCOL FILE ^ORD(101


CPM263>D P^DI


VA FileMan 22.0


Select OPTION: ENTER OR EDIT FILE ENTRIES  



INPUT TO WHAT FILE: PRESCRIPTION// PROTOCOL    (5532 entries)
EDIT WHICH FIELD: ALL// 


Select PROTOCOL NAME: PSO PARK
  Located in the PSO (OUTPATIENT PHARMACY) namespace.
  Are you adding 'PSO PARK' as a new PROTOCOL (the 5533RD)? No// Y  (Yes)
   PROTOCOL ITEM TEXT: Park (OP)
   PROTOCOL IDENTIFIER: ?
     Answer must be 1-63 characters in length.
   PROTOCOL IDENTIFIER: 
ITEM TEXT: Park (OP)// 
Select SYNONYM: PK
Select SYNONYM: PARK
Select SYNONYM: 
PRINT NAME: ?
     Answer must be 1-7 characters in length.
PRINT NAME: 
DISABLE: 
LOCK: 
DESCRIPTION:
  1>
PROHIBITED TIMES: 
TYPE: ? 
     Specify a type for this protocol.
     Choose from: 
       A        action
       M        menu
       O        protocol
       Q        protocol menu
       L        limited protocol
       X        extended action
       D        dialog
       T        term
       E        event driver
       S        subscriber
TYPE: A  action
FILE LINK: 
COST: 
Select ITEM: 
PACKAGE: OUTPATIENT PHARMACY
     1   OUTPATIENT PHARMACY       PSO
     2   OUTPATIENT PHARMACY 4" LABEL       PSL
     3   OUTPATIENT PHARMACY ARCHIVING       PSOA
CHOOSE 1-3: 1  OUTPATIENT PHARMACY     PSO
EXIT ACTION: W ""
ENTRY ACTION: S PSOPK=1,(DA,PPL,PSDA)=$P(PSOLST($P(PSLST,",",ORD)),"^",2) D PARK
^PSOPRK K PSONOOR,PSOPK,COM,DA,PPL,PSDA
Select REQUIRED VARIABLES: 
SCREEN: 
HEADER: 
MENU HELP: 
MENU PROMPT: 
MENU DEFAULT: 
DIC {DIC}: 
COLUMN WIDTH: 
MNEMONIC WIDTH: 
PATH SWITCH: 
IDENTIFIER: 
TIMESTAMP: 62744,81283// 
*ORDER PRINT ACTION: 
*ORDER CANCEL ACTION: 
*ORDER PURGE ACTION: 
Select ACCESS: 
REQUIRES SIGNATURE: 
DOMAIN (DATA TYPE): 
DEFAULT PROMPT: 
DEFAULT ANSWER: 
DEFAULT WORD PROCESSING ANSWER:
  1>
DEFAULT HELP: 
DOMAIN PARAMETER: 
Select METHOD: 
Select SET MEMBERSHIP: 
SENDING APPLICATION: 
RESPONSE MESSAGE TYPE: 
BATCH/FILE MESSAGE COMMIT ACK: 
RECEIVING APPLICATION: 
TRANSACTION MESSAGE TYPE: 
EVENT TYPE: 
MESSAGE STRUCTURE: 
PROCESSING ID: 
LOGICAL LINK: 
ACCEPT ACK CODE: 
APPLICATION ACK TYPE: 
VERSION ID: 
PROCESSING ROUTINE: 
RESPONSE PROCESSING ROUTINE: 
SENDING FACILITY REQUIRED?: 
RECEIVING FACILITY REQUIRED?: 
SECURITY REQUIRED?: 
DATE/TIME OF MESSAGE REQUIRED?: 
ACK MODE SET IN SUBSCRIBER: 
ROUTING LOGIC: 
Select SUBSCRIBERS: 


Select PROTOCOL NAME: PSO UNPARK
  Located in the PSO (OUTPATIENT PHARMACY) namespace.
  Are you adding 'PSO UNPARK' as a new PROTOCOL (the 5534TH)? No// Y  (Yes)
   PROTOCOL ITEM TEXT: Unpark (OP)
   PROTOCOL IDENTIFIER:  
ITEM TEXT: Unpark (OP)// 
Select SYNONYM: UNPARK
Select SYNONYM: UPK
Select SYNONYM: 
PRINT NAME: 
DISABLE: 
LOCK: 
DESCRIPTION:
  1>
PROHIBITED TIMES: 
TYPE: A  action
FILE LINK: 
COST: 
Select ITEM: 
PACKAGE: OUTPATIENT PHARMACY
     1   OUTPATIENT PHARMACY       PSO
     2   OUTPATIENT PHARMACY 4" LABEL       PSL
     3   OUTPATIENT PHARMACY ARCHIVING       PSOA
CHOOSE 1-3: 1  OUTPATIENT PHARMACY     PSO
EXIT ACTION: W ""
ENTRY ACTION: S (DA,PPL,PSDA)=$P(PSOLST($P(PSLST,",",ORD)),"^",2) D UNHOLD^PSOPR
K K COM,DA,PPL,PSDA
Select REQUIRED VARIABLES: 
SCREEN: 
HEADER: 
MENU HELP: 
MENU PROMPT: 
MENU DEFAULT: 
DIC {DIC}: 
COLUMN WIDTH: 
MNEMONIC WIDTH: 
PATH SWITCH: 
IDENTIFIER: 
TIMESTAMP: 62744,81692// 
*ORDER PRINT ACTION: 
*ORDER CANCEL ACTION: 
*ORDER PURGE ACTION: 
Select ACCESS: 
REQUIRES SIGNATURE: 
DOMAIN (DATA TYPE): 
DEFAULT PROMPT: 
DEFAULT ANSWER: 
DEFAULT WORD PROCESSING ANSWER:
  1>
DEFAULT HELP: 
DOMAIN PARAMETER: 
Select METHOD: 
Select SET MEMBERSHIP: 
SENDING APPLICATION: 
RESPONSE MESSAGE TYPE: 
BATCH/FILE MESSAGE COMMIT ACK: 
RECEIVING APPLICATION: 
TRANSACTION MESSAGE TYPE: 
EVENT TYPE: 
MESSAGE STRUCTURE: 
PROCESSING ID: 
LOGICAL LINK: 
ACCEPT ACK CODE: 
APPLICATION ACK TYPE: 
VERSION ID: 
PROCESSING ROUTINE: 
RESPONSE PROCESSING ROUTINE: 
SENDING FACILITY REQUIRED?: 
RECEIVING FACILITY REQUIRED?: 
SECURITY REQUIRED?: 
DATE/TIME OF MESSAGE REQUIRED?: 
ACK MODE SET IN SUBSCRIBER: 
ROUTING LOGIC: 
Select SUBSCRIBERS: 


Select PROTOCOL NAME: 